<script>on mouseStillDownGlobal NewFreq, Stepput card field "MHz" into NewFreqset the numberformat to "0000000"repeat while offset(".",NewFreq) is not 0put offset (".",newfreq) into DecPointdelete char (DecPoint) of NewFreqend repeatput NewFreq + Step into NewFreqDo FreqSendend mouseStillDown</script>
</part>
<part>
<id>3</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>276</left>
<top>32</top>
<right>307</right>
<bottom>55</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DWN</name>
<script>on mouseStillDownGlobal NewFreq, Stepput card field "MHz" into NewFreqrepeat while offset(".",NewFreq) is not 0put offset (".",newfreq) into DecPointdelete char (DecPoint) of NewFreqend repeatset the numberformat to "0000000"put NewFreq - Step into NewFreqadd "0" to NewFreqDo FreqSendend mouseStillDown</script>
</part>
<part>
<id>4</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>236</left>
<top>86</top>
<right>269</right>
<bottom>101</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>RX</name>
<script>on mouseUpglobal CurrentOp, Functionsplay "FT990"if char 7 of Functions = "1" thensendSPortBytes "0,0,0,0,9"put "0" into char 7 of Functionsput empty into card field "Clar RX Display" of card "Main Display"elsesendSPortBytes "0,0,0,1,9"put "1" into char 7 of Functionsput "RX" into card field "Clar RX Display" of card "Main Display"end ifend mouseUp</script>
</part>
<part>
<id>5</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>313</left>
<top>86</top>
<right>346</right>
<bottom>101</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>LOCK</name>
<script>on mouseUpglobal FlagByte2play "FT990"if char 5 of FlagByte2 = "1" thensendSPortBytes "0,0,0,0,4"put "0" into char 5 of FlagByte2put empty into card field "Lock Display" of card "Main Display"elsesendSPortBytes "0,0,0,1,4"put "1" into char 5 of Flagbyte2put "LOCK" into card field "Lock Display" of card "Main Display"end ifend mouseUp</script>
</part>
<part>
<id>6</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>176</left>
<top>181</top>
<right>210</right>
<bottom>196</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>250</name>
<script>on mouseUpplay "FT990"sendSPortbytes "0,0,0,3,140"put "250" into card field "Width Display" of card "Main Display"end mouseUp</script>
<script>on mouseUpplay "FT990"sendSPortBytes "0,0,0,0,12"put "LSB" into card field "Mode Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>176</left>
<top>141</top>
<right>209</right>
<bottom>156</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>VFO > M</name>
<script>on mouseUpplay "FT990"put "0,0,0,0,3" into MemNumput card field "Mem Number Display" into char 7 of MemNum-- sendSPortBytes "0,0,0"-- sendSPort (numtochar of MemNum)-- sendSPortBytes "3"SendSPortBytes MemNumDo FullUpdateSettingsend mouseUp</script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>130</left>
<top>141</top>
<right>163</right>
<bottom>156</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>M > VFO</name>
<script>on mouseUpplay "FT990"put "0,0,0,0,6" into MemNumput card field "Mem Number Display" into char 7 of MemnumsendSPortBytes MemNumDo DisplayUpdateend mouseUp</script>
<script>on mouseUpglobal Flagbyte1play "FT990"if char 8 of Flagbyte1 = "1" thensendSPortBytes "0,0,0,0,1"put "0" into char 8 of FlagByte1put empty into card field "Split Display" of card "Main Display"elsesendSPortBytes "0,0,0,1,1"put "1" into char 8 of FlagByte1put "SPLIT" into card field "Split Display" of card "Main Display"end ifend mouseUp</script>
</part>
<part>
<id>17</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>27</left>
<top>24</top>
<right>66</right>
<bottom>37</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>SPLIT DISPLAY</name>
<script></script>
</part>
<part>
<id>19</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>27</left>
<top>37</top>
<right>65</right>
<bottom>49</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>BAND DISPLAY</name>
<script></script>
</part>
<part>
<id>22</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>27</left>
<top>49</top>
<right>63</right>
<bottom>64</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>LOCK DISPLAY</name>
<script></script>
</part>
<part>
<id>27</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>143</left>
<top>22</top>
<right>179</right>
<bottom>36</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>Mode Display</name>
<script></script>
</part>
<part>
<id>23</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>68</left>
<top>22</top>
<right>105</right>
<bottom>36</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>FAST DISPLAY</name>
<script></script>
</part>
<part>
<id>32</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>109</left>
<top>22</top>
<right>144</right>
<bottom>35</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>Width DISPLAY</name>
<script></script>
</part>
<part>
<id>34</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>157</left>
<top>86</top>
<right>177</right>
<bottom>99</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>condense</textStyle>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>MEM NUMBER DISPLAY</name>
<script>on mouseUpplay "FT990"put "0,0,0,0,3" into MemNumask "Enter memory number"if it = empty then exit mouseUpput it into char 7 of MemNumsendSPortbytes MemNum-- sendSPortBytes "0,0,0"-- sendSPort (numtochar of MemNum)-- sendSPortBytes "3"Do FullUpdateSettingsend mouseUp</script>
</part>
<part>
<id>35</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <true /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>96</left>
<top>37</top>
<right>218</right>
<bottom>59</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>18</textSize>
<textStyle>condense</textStyle>
<textStyle>shadow</textStyle>
<textStyle>bold</textStyle>
<textHeight>24</textHeight>
<name>MHZ</name>
<script></script>
</part>
<part>
<id>43</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>274</left>
<top>141</top>
<right>308</right>
<bottom>156</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>ENTER FREQUENCY</name>
<script>on mouseUpGlobal NewFreqplay "FT990"set the numberformat to "00.00000"ask "Enter new frequency (Just 1 decimal point)"if it = empty then exit mouseUpput it into NewFreqadd "0" to NewFreqrepeat while offset(".",NewFreq) is not 0put offset (".",newfreq) into DecPointdelete char (DecPoint) of NewFreqend repeatDo FreqSendend mouseUp</script>
<script>on mouseUpplay "FT-747GX"colorizeHC "add","Front Panel"set visible of card field "MR DISPLAY NUM"¬to not visible of card field "MR DISPLAY NUM"set visible of card button "Cancel" to falseset style of card button "Mem Display Cover" to opaqueend mouseUp</script>
</part>
<part>
<id>137</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>29</left>
<top>169</top>
<right>62</right>
<bottom>184</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Database</name>
<script>on mouseUpplay "FT990"put FilePath("TEXT", "Where is you database file ?") into filenameif filename = empty thenexit mouseUpelseopen file fileNameread from file fileName for 32000if it is empty thenbeepbeepclose file fileNameexit mouseUpelse put empty into tempRecordput it after tempRecordput return into last char of tempRecordput 0 into crepeat while offset(tab,tempRecord) is not 0--set the cursor to "globe " & c--wait 3 ticksget offset(tab,tempRecord)set cursor to busyput " " into char it of tempRecord-- wait 5 ticks--add 1 to c--if c >= 10 then put 0 into cend repeatclose file fileNameend ifrepeat while offset(":",filename) is not 0get offset(":",filename)delete char 1 to it of filenameend repeatif there is not a window "Database"thenListoid filename & " Database",tempRecord,"Zoom","0,40","Courier","dis",¬"Freq / Mode / Comments","black,yellow"end ifend mouseUp</script>
</part>
<part>
<id>138</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>130</left>
<top>123</top>
<right>163</right>
<bottom>138</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Mem</name>
<script>on mouseUpglobal MemDataRec, FullUpdateset cursor to watch--Do UpdateMemoryput card field "Mem Number Display" into MemNumif there is not a window "Memory Recall" thenListoid "Memory Recall",MemDataRec,"Zoom","50,50",(MemNum),"Courier","dis",¬"Mem# Freq Mode Filter","red,yellow"end ifset cursor to handend MouseUp</script>
</part>
<part>
<id>139</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>186</left>
<top>83</top>
<right>206</right>
<bottom>99</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Mem Up</name>
<script>on mouseStillDownGlobal MemDataRec, MemCKIf MemCK = "M CK" thendo RecallmemUpelseput card field "Mem Number Display" into MemNumif MemNum = "90" then put "1" into MemNumelseput MemNum + 1 into MemNumend ifput MemNum into card field "Mem Number Display" of card "Main Display"put word 2 of line (MemNum) of MemDataRec into¬card field "Mem Freq" of card "Main Display"wait 5 ticksend ifend mouseStillDown</script>
</part>
<part>
<id>140</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>186</left>
<top>98</top>
<right>206</right>
<bottom>116</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Mem Down</name>
<script>on mouseStillDownGlobal MemDataRec, MemCKIf MemCK = "M CK" thendo RecallmemDownelseput card field "Mem Number Display" into MemNumif MemNum = "1" then put "90" into MemNumelseput MemNum - 1 into MemNumend ifput MemNum into card field "Mem Number Display" of card "Main Display"put word 2 of line (MemNum) of MemDataRec into¬card field "Mem Freq" of card "Main Display"wait 5 ticksend ifend mouseStillDown</script>
</part>
<part>
<id>145</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>178</left>
<top>22</top>
<right>220</right>
<bottom>36</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>VFO Display</name>
<script></script>
</part>
<part>
<id>148</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>236</left>
<top>105</top>
<right>269</right>
<bottom>120</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>TX</name>
<script>on mouseUpglobal CurrentOp, Functionsplay "FT990"if char 8 of Functions = "1" thensendSPortBytes "0,0,0,128,9"put "0" into char 8 of Functionsput empty into card field "Clar TX Display" of card "Main Display"elsesendSPortBytes "0,0,0,129,9"put "1" into char 8 of Functionsput "TX" into card field "Clar TX Display" of card "Main Display"end ifend mouseUp</script>
<script>on mouseUpplay "FT990"sendSPortbytes "0,0,0,2,140"put "500" into card field "Width Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>152</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>257</left>
<top>181</top>
<right>291</right>
<bottom>196</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>2.0K</name>
<script>on mouseUpplay "FT990"sendSPortbytes "0,0,0,1,140"put "2.0K" into card field "Width Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>153</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>297</left>
<top>181</top>
<right>331</right>
<bottom>196</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>2.4K</name>
<script>on mouseUpplay "FT990"sendSPortbytes "0,0,0,0,140"put "2.4K" into card field "Width Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>156</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>68</left>
<top>35</top>
<right>91</right>
<bottom>48</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>Clar RX Display</name>
<script></script>
</part>
<part>
<id>157</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>68</left>
<top>48</top>
<right>91</right>
<bottom>62</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>Clar TX Display</name>
<script></script>
</part>
<part>
<id>159</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>72</left>
<top>85</top>
<right>105</right>
<bottom>100</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>FM</name>
<script>on mouseUpplay "FT990"sendSPortBytes "0,0,0,6,12"put "FM" into card field "Mode Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>160</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>29</left>
<top>104</top>
<right>62</right>
<bottom>119</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>USB</name>
<script>on mouseUpplay "FT990"sendSPortBytes "0,0,0,1,12"put "USB" into card field "Mode Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>161</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>29</left>
<top>122</top>
<right>62</right>
<bottom>137</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>CW</name>
<script>on mouseUpplay "FT990"sendSPortBytes "0,0,0,3,12"put "CW" into card field "Mode Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>162</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>29</left>
<top>140</top>
<right>62</right>
<bottom>155</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>AM</name>
<script>on mouseUpplay "FT990"sendSPortBytes "0,0,0,5,12"put "AM" into card field "Mode Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>163</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>72</left>
<top>104</top>
<right>105</right>
<bottom>119</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>RTTY</name>
<script>on mouseUpplay "FT990"sendSPortBytes "0,0,0,8,12"put "RTY" into card field "Mode Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>164</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>72</left>
<top>122</top>
<right>105</right>
<bottom>137</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>PACKET</name>
<script>on mouseUpplay "FT990"sendSPortBytes "0,0,0,10,12"put "PKT" into card field "Mode Display" of card "Main Display"end mouseUp</script>
</part>
<part>
<id>168</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>127</left>
<top>104</top>
<right>183</right>
<bottom>118</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Mem freq</name>
<script></script>
</part>
<part>
<id>170</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>176</left>
<top>123</top>
<right>209</right>
<bottom>138</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Recall Memory</name>
<script>on mouseUpGlobal MemCK, FlagByte2if MemCK = "VFO" thenput "M CK" into MemCKput "M CK" into card field "Band Display" of card "Main Display"elseput "VFO" into MemCKdo DisplayUpdateend ifend mouseUp</script>
</part>
<part>
<id>182</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>214</left>
<top>45</top>
<right>253</right>
<bottom>60</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>ClarOffSet</name>
<script></script>
</part>
<part>
<id>184</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>220</left>
<top>21</top>
<right>254</right>
<bottom>36</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>Meter</name>
<script></script>
</part>
<part>
<id>186</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>313</left>
<top>105</top>
<right>346</right>
<bottom>120</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Tuner</name>
<script>on mouseUpGlobal FlagByte3put "0,0,0,0,129" into TunnerStatif char 2 of FlagByte3 = 1 thenput 0 into char 2 of FlagByte3elseput 1 into char 7 of TunnerStatput 1 into char 2 of FlagByte3end ifSendSPortBytes TunnerStatend mouseUp</script>
</part>
<part>
<id>188</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>236</left>
<top>141</top>
<right>269</right>
<bottom>156</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>RPT</name>
<script>on mouseUpGlobal FrontPlay "FT990"if card field "Mode Display" <> "FM" thenbeepexit mouseUpend ifif item 5 of front >= 8 thensendSPortBytes "0,0,0,2,132"put (item 5 of front - 8) + 4 into item 5 of frontput "+RPT" into card field "Repeater" of card "Main Display"elseif item 5 of front >= 4 thensendSPortBytes "0,0,0,0,132"put (item 5 of front - 4) into item 5 of frontput empty into card field "Repeater" of card "Main Display"elsesendSPortBytes "0,0,0,1,132"put (item 5 of front + 8) into item 5 of frontput "-RPT" into card field "Repeater" of card "Main Display"end ifend ifend mouseUp</script>
</part>
<part>
<id>189</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>70</left>
<top>140</top>
<right>106</right>
<bottom>155</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>Repeater</name>
<script></script>
</part>
<part>
<id>190</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>313</left>
<top>141</top>
<right>346</right>
<bottom>156</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>MOX</name>
<script>on mouseUpGlobal FlagByte3, FlagByte1if char 1 of FlagByte1 = 1 thensendSPortBytes "0,0,0,0,15"put 0 into char 1 of FlagByte1elsesendSPortBytes "0,0,0,1,15"put 1 into char 1 of FlagByte1end ifput FlagByte3 into message boxend mouseUp</script>
</part>
<part>
<id>192</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>69</left>
<top>169</top>
<right>102</right>
<bottom>184</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Pan</name>
<script>on mouseUpglobal SerialBuffer, SportBuffer,freq, Reclock screenget recvChars(charsAvailable())sendSPortbytes "0,0,0,2,16"wait 4 ticksif CharsAvailable() <> 32 then wait 2 ticksif CharsAvailable() <> 32 thenBeepexit MouseUpelseput RecvBytes (16) into CurrentOpend ifrepeat with x = 2 to 4put NumToBinary (item x of CurrentOp) after tempend repeatrepeat with x = 1 to the length of tempput char x of temp before Binaryend repeatput "0" into freqrepeat with x = the length of temp down to 1if char x of binary = "1" thenadd exp2(x - 1) to freqelseend ifend repeatgo to card "pan"set numberformat to "0000000"put Freq + 1100 into UpperFreqput Freq - 1000 into LowerFreqput LowerFreq into NewFreqput 40 into LeftUpput 180 into LeftDownput 40 into RightAcrossput 180 into RightDownadd "0" to NewFreqset numberformat to "00"repeat while NewFreq <> UpperFreqput char 1 of Newfreq into MHz1put char 2 of Newfreq * 16 + char 3 of Newfreq into MHz2put char 4 of Newfreq * 16 + char 5 of Newfreq into KHz1put char 6 of Newfreq * 16 + char 7 of Newfreq into KHz2if KHz2 = "00" thensendSPortbytes "0"elsesendSPort numtochar (KHz2)end ifif KHz1 = "00" thensendSPortbytes "0"elsesendSPort numtochar (KHz1)end ifif MHz2 = "00" thensendSPortbytes "0"elsesendSPort numtochar (MHz2)end ifif MHz1 = "00" thensendSPortbytes "0"elsesendSPort numtochar (MHz1)end ifsendSPortbytes "10"get recvChars(charsAvailable())sendSPortbytes "0,0,0,0,247"put recvUpTo (empty,1,empty) into Recput the chartonum of char 1 of rec into SignalLevelset numberformat to "0000000"put NewFreq + 100 into NewFreqadd "0" to NewFreqif signallevel > 240 then put 240 into SignalLevelput round (SignalLevel / 4) into SignalLevellock screenchoose eraser tooldrag from (LeftUp),(LeftDown) to (RightAcross),(0)choose line tooldrag from (LeftUp),(LeftDown) to (RightAcross),(RightDown - SignalLevel)unlock screenput LeftUp + 10 into LeftUpput RightAcross + 10 into RightAcrossend repeatchoose browse toolput char 1 of freq into MHz1put char 2 of freq * 16 + char 3 of freq into MHz2put char 4 of freq * 16 + char 5 of freq into KHz1put char 6 of freq * 16 + char 7 of freq into KHz2if KHz2 = "00" thensendSPortbytes "0"elsesendSPort numtochar (KHz2)end ifif KHz1 = "00" thensendSPortbytes "0"elsesendSPort numtochar (KHz1)end ifif MHz2 = "00" thensendSPortbytes "0"elsesendSPort numtochar (MHz2)end ifif MHz1 = "00" thensendSPortbytes "0"elsesendSPort numtochar (MHz1)end ifsendSPortbytes "10"choose select tooldrag from 6,112 to 282,197domenu "Copy Picture"choose browse toolgo cd "Main Display"picture "Panoranic Display", clipboard,plain,true,0,trueunlock screenend mouseUp</script>
</part>
<content>
<layer>card</layer>
<id>104</id>
<text>NOT IN THIS MODE !</text>
</content>
<content>
<layer>card</layer>
<id>145</id>
<text>VFO A</text>
</content>
<content>
<layer>card</layer>
<id>182</id>
<text>0.00</text>
</content>
<content>
<layer>card</layer>
<id>34</id>
<text>10</text>
</content>
<content>
<layer>card</layer>
<id>35</id>
<text>14.290.00</text>
</content>
<content>
<layer>card</layer>
<id>27</id>
<text>USB</text>
</content>
<content>
<layer>card</layer>
<id>32</id>
<text>2.4K</text>
</content>
<content>
<layer>card</layer>
<id>168</id>
<text>14.250.00</text>
</content>
<name>MAIN DISPLAY</name>
<script>on ListoidSelect What,Whereif Where = "Memory Recall" thensendSPortbytes "0,0,0"sendsport (the numtochar of word 1 of what)sendsportbytes "2"put (word 1 of what) into card field "Mr Number Display"elseset the numberformat to "00.00000"put word 1 of what into NewFreqadd "0" to NewFreqrepeat while offset(".",NewFreq) is not 0put offset (".",newfreq) into DecPointdelete char (DecPoint) of NewFreqend repeatset numberformat to "00"put char 1 of Newfreq into MHz1put char 2 of Newfreq * 16 + char 3 of Newfreq into MHz2put char 4 of Newfreq * 16 + char 5 of Newfreq into KHz1put char 6 of Newfreq * 16 + char 7 of Newfreq into KHz2if KHz2 = "00" thensendSPortbytes "0"elsesendSPort numtochar (KHz2)end ifif KHz1 = "00" thensendSPortbytes "0"elsesendSPort numtochar (KHz1)end ifif MHz2 = "00" thensendSPortbytes "0"elsesendSPort numtochar (MHz2)end ifif MHz1 = "00" thensendSPortbytes "0"elsesendSPort numtochar (MHz1)end ifsendSPortbytes "10"end ifend ListoidSelecton idleglobal Updatetime, lastupdate, TryNum,¬UpdateChecked, Front, MeterOn,Functionsif Meteron = "YES" then do Meterif UpdateChecked = "ON" thenif (the ticks - lastupdate) > Updatetime thenget recvChars(charsAvailable())sendSPortbytes "0,0,0,2,16"wait 5 ticksif CharsAvailable() <> 32 then wait 5 ticksif CharsAvailable() <> 32 thenBeeppicture 129, resource, dialogwait until the mouseClickclose window "WARNING!"exit Idleelseput RecvBytes (16) into CurrentOpend ifif CurrentOp ≠ Front thenput CurrentOp into FrontDo RigTrackput the ticks into lastupdateelseput the ticks into lastupdateend ifend ifend ifpass idleend idleOn Meterget recvChars(charsAvailable())sendSPortbytes "0,0,0,0,247"put recvUpTo (empty,1,empty) into Recput round (the chartonum of char 1 of rec / 15) into Smeterif Smeter <= 9 thenput Smeter into Smeterelseif Smeter = 10 thenput "+" & Smeter into Smeterelseput "+" & char 2 of Smeter & "0" into Smeterend ifend ifif card field "Meter" <> Smeter thenput Smeter into card field "Meter" of card "Main Display"end ifend Meteron opencardcolorizeHC "Enable"end opencard</script>